← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 16:10:05 2022
Reported on Wed Dec 14 16:12:58 2022

Filename(eval 307)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 27 statements in 312µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
1721221µs458µsJSON::Schema::Modern::Document::::has_errors JSON::Schema::Modern::Document::has_errors
1119µs21µsJSON::Schema::Modern::Document::::BEGIN@5.154 JSON::Schema::Modern::Document::BEGIN@5.154
1114µs4µsMethod::Generate::Accessor::_Generated::::BEGIN@10.155Method::Generate::Accessor::_Generated::BEGIN@10.155
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
220s my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
310s my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4 package JSON::Schema::Modern::Document;
5250µs233µs
# spent 21µs (9+12) within JSON::Schema::Modern::Document::BEGIN@5.154 which was called: # once (9µs+12µs) by Sub::Quote::_clean_eval at line 5
no warnings 'closure';
# spent 21µs making 1 call to JSON::Schema::Modern::Document::BEGIN@5.154 # spent 12µs making 1 call to warnings::unimport
6
# spent 458µs (221+237) within JSON::Schema::Modern::Document::has_errors which was called 17 times, avg 27µs/call: # 9 times (107µs+119µs) by JSON::Schema::Modern::add_schema at line 159 of JSON/Schema/Modern.pm, avg 25µs/call # 8 times (114µs+118µs) by JSON::Schema::Modern::_get_or_load_resource at line 820 of JSON/Schema/Modern.pm, avg 29µs/call
sub has_errors {
7 ($_QUOTED,$_UNQUOTED) if 0;
8# BEGIN quote_sub PRELUDE
9package Method::Generate::Accessor::_Generated;
10
# spent 4µs within Method::Generate::Accessor::_Generated::BEGIN@10.155 which was called: # once (4µs+0s) by Sub::Quote::_clean_eval at line 15
BEGIN {
1110s $^H = 2018;
1211µs ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1312µs %^H = (
14 );
15128µs14µs}
16# END quote_sub PRELUDE
1717228µs51237µsshift->_assert_errors->${\Data::Perl::Collection::Array::MooseLike->can("count")}(@_); }
# spent 183µs making 17 calls to JSON::Schema::Modern::Document::_assert_errors, avg 11µs/call # spent 27µs making 17 calls to Data::Perl::Role::Collection::Array::count, avg 2µs/call # spent 27µs making 17 calls to UNIVERSAL::can, avg 2µs/call
1810s $$_UNQUOTED = \&has_errors;
19}
2013µs1;
21
22;